home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Almathera Ten Pack 3: CDPD 3
/
Almathera Ten on Ten - Disc 3: CDPD3.iso
/
ab20
/
ab20_archive
/
games
/
strategy
/
madgic-corewar-4.0.lzh
/
1987
/
LINCOGS2.S
< prev
next >
Wrap
Text File
|
1988-07-09
|
619b
|
27 lines
; LinCoGs
; Mark A.Durham
; October 5, 1987
;
MOV #4, RETURN
JMP RANDOM
SRC DAT #0
GAIT DAT #7
RANDOM MOV GAIT, SRC
ADD SRC, SRC
ADD SRC, SRC
ADD SRC, GAIT
ADD #1, GAIT
RETURN JMP @RETURN
BOMB MOV #4, RETURN
MOV GAIT, @GAIT
JMP RANDOM
COPY MOV #BTM+1-SRC, SRC
MOV #BTM-1, DEST
DEST ADD GAIT, #BTM
LOCO MOV <SRC, <DEST
JMN LOCO, SRC
SPL @GAIT
MOV #1, RETURN
BTM JMP RANDOM
END